home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Auge 4000 / Auge 4000 #75 (1993-12-29)(Amiga User Gruppe Einzugsgebiet 4000).zip / Auge 4000 #75 (1993-12-29)(Amiga User Gruppe Einzugsgebiet 4000).adf / T / Command-0-T01
Text File  |  1994-01-06  |  961b  |  66 lines
  1. failat 21
  2.  
  3.  
  4.  
  5. if not exists GED097_1.lha
  6.     echo
  7.     echo "Falsches Verzeichnis! Bitte Auspacken-Script im Originalverzeichnis"
  8.     echo "der A.U.G.E.-Diskette starten!"
  9.     echo
  10.     quit
  11. endif
  12.  
  13. echo
  14. echo
  15. echo "              A.U.G.E. Installationsscript GoldEd "
  16. echo "*n*n Soll mit dem Auspacken begonnen werden? " noline
  17. set >nil: InpVar ?
  18.  
  19. if $InpVar eq "ja"
  20.   skip Start
  21. endif
  22.  
  23. if $InpVar eq "j"
  24.   skip Start
  25. endif
  26.  
  27. if $InpVar eq "y"
  28.   skip Start
  29. endif
  30.  
  31. if $InpVar eq "yes"
  32.   skip Start
  33. endif
  34.  
  35. echo noline "*n*e[32m Auspacken beendet."
  36. quit
  37.  
  38. lab start
  39. lab Pfadfrage
  40. echo "*n*n Bitte Pfad angeben, wohin entpackt werden soll (Crtl-D für Ende):"
  41. set >nil: Pfad ?
  42.  
  43. if not exists $Pfad
  44.     echo "*n Pfadangabe nicht korrekt!"
  45.     skip back Pfadfrage
  46. endif
  47.  
  48.   :C/LHA x Ged097_1.lha $Pfad
  49.  
  50. if fail
  51.     echo "*n Auspacken ist fehlgeschlagen!"
  52.     quit
  53.  
  54. endif
  55.  
  56.  
  57. echo "Das wars, die Schublade Golded1 ist im Verzeichnis '$Pfad' zu finden!"
  58. echo
  59. wait 4 sec
  60. quit
  61.  
  62.  
  63.  
  64.  
  65.  
  66.